<!DOCTYPE stack PUBLIC "-//Apple, Inc.//DTD stack V 2.0//EN" "" >
<stack>
<name>in.0</name>
<id>-1</id>
<cardCount>2</cardCount>
<cardID>3744</cardID>
<listID>2061</listID>
<cantModify><false /></cantModify>
<cantDelete><false /></cantDelete>
<cantAbort><false /></cantAbort>
<cardSize>
<width>512</width>
<height>390</height>
</cardSize>
<script>on openCardif the version < 2.3 thenbeepanswer "ﾃ頴ﾃ [ﾃ姥ﾃ嘉｡ﾃ嘉ｬ2.3ﾃ ﾂｻﾃｨ窶榲竕暗ｩgﾃｳpﾃﾂｵﾃﾆ津｢竏ｫﾃ竕･ﾃﾂ｢" with "Quit"put "ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ① ﾃ①ﾃ①I`m sorry..." into msgwait 3 sechide msgdoMenu "Quit HyperCard"end ifif the systemVersion < 7.5 thenbeepanswer "ﾃ鰻ﾃ厩ﾃ影ﾃ嘉7.5ﾃ ﾂｻﾃｨ窶榲竕暗ｩgﾃｳpﾃﾂｵﾃﾆ津竕 ﾃﾃｦﾃ竕･ﾃﾂ｢" with "Quit"put "ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ①ﾃ① ﾃ①ﾃ①I`m sorry..." into msgwait 3 sechide msgdoMenu "Quit HyperCard"end iflock screenput topLeft of cd window into tlset height of this cd to 445set topLeft of cd window to tlput menu "ﾃδｴ窶ｺﾆ" into cd btn "FontList"Send colorMe to this cardset the icon of card btn "actBtn" to 15420lock screenput topLeft of cd window into tlset height of this cd to 390set topLeft of cd window to tlset the textArrows to truepass openCardend openCardon openStacklock screenput topLeft of cd window into tlset height of this cd to 445set topLeft of cd window to tlAddColor installpass openStackend openStackon closeCardlock screenpass closeCardend closeCardon colorMeAddColor colorCard,stamp,0end colorMeon closeStackAddColor removepass closeStackend closeStackon quitif the freeSize of this stack > 0 and the diskSpace > the size of this stack thendoMenu "Compact stack"doMenu "Compact stack"end ifend quit</script>
